perm filename FOR21.SCR[PIC,LCS] blob
sn#251304 filedate 1976-12-05 generic text, type T, neo UTF8
< FOR21.SCR -- RANDOM NUMBER= 1
PLAY;
TOOT 0.00 0.10 C/8 1000.0 F1 F3
;PRINT(P1);< TOOT 1
TOOT 0.10 0.10 C/8 1000.0 F1 F3
;PRINT(P1);< TOOT 2
TOOT 0.20 0.10 CS/8 1000.0 F1 F3
;PRINT(P1);< TOOT 3
TOOT 0.30 0.10 D/8 1000.0 F1 F3
;PRINT(P1);< TOOT 4
TOOT 0.40 0.10 DS/8 1000.0 F1 F3
;PRINT(P1);< TOOT 5
TOOT 0.50 0.10 E/8 1000.0 F1 F3
;PRINT(P1);< TOOT 6
TOOT 0.60 0.10 F/8 1000.0 F1 F3
;PRINT(P1);< TOOT 7
TOOT 0.70 0.10 FS/8 1000.0 F1 F3
;PRINT(P1);< TOOT 8
TOOT 0.80 0.10 G/8 1000.0 F1 F3
;PRINT(P1);< TOOT 9
TOOT 0.90 0.10 GS/8 1000.0 F1 F3
;PRINT(P1);< TOOT 10
TOOT 1.00 0.10 A/8 1000.0 F1 F3
;PRINT(P1);< TOOT 11
TOOT 1.10 0.10 AS/8 1000.0 F1 F3
;PRINT(P1);< TOOT 12
TOOT 1.20 0.10 B/8 1000.0 F1 F3
;PRINT(P1);< TOOT 13
TOOT 1.30 0.10 C/4 1000.0 F1 F3
;PRINT(P1);< TOOT 14
TOOT 1.40 0.10 CS/4 1000.0 F1 F3
;PRINT(P1);< TOOT 15
TOOT 1.50 0.10 CS/4 1000.0 F1 F3
;PRINT(P1);< TOOT 16
TOOT 1.60 0.10 D/4 1000.0 F1 F3
;PRINT(P1);< TOOT 17
TOOT 1.70 0.10 DS/4 1000.0 F1 F3
;PRINT(P1);< TOOT 18
TOOT 1.80 0.10 E/4 1000.0 F1 F3
;PRINT(P1);< TOOT 19
TOOT 1.90 0.10 F/4 1000.0 F1 F3
;PRINT(P1);< TOOT 20
TOOT 2.00 0.10 FS/4 1000.0 F1 F3
;PRINT(P1);< TOOT 21
TOOT 2.10 0.10 G/4 1000.0 F1 F3
;PRINT(P1);< TOOT 22
TOOT 2.20 0.10 GS/4 1000.0 F1 F3
;PRINT(P1);< TOOT 23
TOOT 2.30 0.10 A/4 1000.0 F1 F3
;PRINT(P1);< TOOT 24
TOOT 2.40 0.10 AS/4 1000.0 F1 F3
;PRINT(P1);< TOOT 25
TOOT 2.50 0.10 B/4 1000.0 F1 F3
;PRINT(P1);< TOOT 26
TOOT 2.60 0.10 C/2 1000.0 F1 F3
;PRINT(P1);< TOOT 27
TOOT 2.70 0.10 CS/2 1000.0 F1 F3
;PRINT(P1);< TOOT 28
TOOT 2.80 0.10 D/2 1000.0 F1 F3
;PRINT(P1);< TOOT 29
TOOT 2.90 0.10 DS/2 1000.0 F1 F3
;PRINT(P1);< TOOT 30
TOOT 3.00 0.10 DS/2 1000.0 F1 F3
;PRINT(P1);< TOOT 31
TOOT 3.10 0.10 E/2 1000.0 F1 F3
;PRINT(P1);< TOOT 32
TOOT 3.20 0.10 F/2 1000.0 F1 F3
;PRINT(P1);< TOOT 33
TOOT 3.30 0.10 FS/2 1000.0 F1 F3
;PRINT(P1);< TOOT 34
TOOT 3.40 0.10 G/2 1000.0 F1 F3
;PRINT(P1);< TOOT 35
TOOT 3.50 0.10 GS/2 1000.0 F1 F3
;PRINT(P1);< TOOT 36
TOOT 3.60 0.10 A/2 1000.0 F1 F3
;PRINT(P1);< TOOT 37
TOOT 3.70 0.10 AS/2 1000.0 F1 F3
;PRINT(P1);< TOOT 38
TOOT 3.80 0.10 B/2 1000.0 F1 F3
;PRINT(P1);< TOOT 39
TOOT 3.90 0.10 C 1000.0 F1 F3
;PRINT(P1);< TOOT 40
TOOT 4.00 0.10 CS 1000.0 F1 F3
;PRINT(P1);< TOOT 41
TOOT 4.10 0.10 D 1000.0 F1 F3
;PRINT(P1);< TOOT 42
TOOT 4.20 0.10 DS 1000.0 F1 F3
;PRINT(P1);< TOOT 43
TOOT 4.30 0.10 E 1000.0 F1 F3
;PRINT(P1);< TOOT 44
TOOT 4.40 0.10 F 1000.0 F1 F3
;PRINT(P1);< TOOT 45
TOOT 4.50 0.10 F 1000.0 F1 F3
;PRINT(P1);< TOOT 46
TOOT 4.60 0.10 FS 1000.0 F1 F3
;PRINT(P1);< TOOT 47
TOOT 4.70 0.10 G 1000.0 F1 F3
;PRINT(P1);< TOOT 48
TOOT 4.80 0.10 GS 1000.0 F1 F3
;PRINT(P1);< TOOT 49
TOOT 4.90 0.10 A 1000.0 F1 F3
;PRINT(P1);< TOOT 50
TOOT 5.00 0.10 AS 1000.0 F1 F3
;PRINT(P1);< TOOT 51
TOOT 5.10 0.10 B 1000.0 F1 F3
;PRINT(P1);< TOOT 52
TOOT 5.20 0.10 C*2 1000.0 F1 F3
;PRINT(P1);< TOOT 53
TOOT 5.30 0.10 CS*2 1000.0 F1 F3
;PRINT(P1);< TOOT 54
TOOT 5.40 0.10 D*2 1000.0 F1 F3
;PRINT(P1);< TOOT 55
TOOT 5.50 0.10 DS*2 1000.0 F1 F3
;PRINT(P1);< TOOT 56
TOOT 5.60 0.10 E*2 1000.0 F1 F3
;PRINT(P1);< TOOT 57
TOOT 5.70 0.10 F*2 1000.0 F1 F3
;PRINT(P1);< TOOT 58
TOOT 5.80 0.10 FS*2 1000.0 F1 F3
;PRINT(P1);< TOOT 59
TOOT 5.90 0.10 G*2 1000.0 F1 F3
;PRINT(P1);< TOOT 60
TOOT 6.00 0.10 G*2 1000.0 F1 F3
;PRINT(P1);< TOOT 61
TOOT 6.10 0.10 GS*2 1000.0 F1 F3
;PRINT(P1);< TOOT 62
TOOT 6.20 0.10 A*2 1000.0 F1 F3
;PRINT(P1);< TOOT 63
TOOT 6.30 0.10 AS*2 1000.0 F1 F3
;PRINT(P1);< TOOT 64
TOOT 6.40 0.10 B*2 1000.0 F1 F3
;PRINT(P1);< TOOT 65
TOOT 6.50 0.10 C*4 1000.0 F1 F3
;PRINT(P1);< TOOT 66
TOOT 6.60 0.10 CS*4 1000.0 F1 F3
;PRINT(P1);< TOOT 67
TOOT 6.70 0.10 D*4 1000.0 F1 F3
;PRINT(P1);< TOOT 68
TOOT 6.80 0.10 DS*4 1000.0 F1 F3
;PRINT(P1);< TOOT 69
TOOT 6.90 0.10 E*4 1000.0 F1 F3
;PRINT(P1);< TOOT 70
TOOT 7.00 0.10 F*4 1000.0 F1 F3
;PRINT(P1);< TOOT 71
TOOT 7.10 0.10 FS*4 1000.0 F1 F3
;PRINT(P1);< TOOT 72
TOOT 7.20 0.10 G*4 1000.0 F1 F3
;PRINT(P1);< TOOT 73
TOOT 7.30 0.10 GS*4 1000.0 F1 F3
;PRINT(P1);< TOOT 74
TOOT 7.40 0.10 A*4 1000.0 F1 F3
;PRINT(P1);< TOOT 75
TOOT 7.50 0.10 A*4 1000.0 F1 F3
;PRINT(P1);< TOOT 76
TOOT 7.60 0.10 AS*4 1000.0 F1 F3
;PRINT(P1);< TOOT 77
TOOT 7.70 0.10 B*4 1000.0 F1 F3
;PRINT(P1);< TOOT 78
TOOT 7.80 0.10 C*8 1000.0 F1 F3
;PRINT(P1);< TOOT 79
TOOT 7.90 0.10 CS*8 1000.0 F1 F3
;PRINT(P1);< TOOT 80
TOOT 8.00 0.10 D*8 1000.0 F1 F3
;PRINT(P1);< TOOT 81
TOOT 8.10 0.10 DS*8 1000.0 F1 F3
;PRINT(P1);< TOOT 82
TOOT 8.20 0.10 E*8 1000.0 F1 F3
;PRINT(P1);< TOOT 83
TOOT 8.30 0.10 F*8 1000.0 F1 F3
;PRINT(P1);< TOOT 84
TOOT 8.40 0.10 FS*8 1000.0 F1 F3
;PRINT(P1);< TOOT 85
TOOT 8.50 0.10 G*8 1000.0 F1 F3
;PRINT(P1);< TOOT 86
TOOT 8.60 0.10 GS*8 1000.0 F1 F3
;PRINT(P1);< TOOT 87
TOOT 8.70 0.10 A*8 1000.0 F1 F3
;PRINT(P1);< TOOT 88
TOOT 8.80 0.10 AS*8 1000.0 F1 F3
;PRINT(P1);< TOOT 89
TOOT 8.90 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 90
TOOT 9.00 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 91
TOOT 9.10 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 92
TOOT 9.20 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 93
TOOT 9.30 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 94
TOOT 9.40 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 95
TOOT 9.50 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 96
TOOT 9.60 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 97
TOOT 9.70 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 98
TOOT 9.80 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 99
TOOT 9.90 0.10 B*8 1000.0 F1 F3
;PRINT(P1);< TOOT 100
FINISH; < FOR21.SCR